home *** CD-ROM | disk | FTP | other *** search
/ Aminet 8 / Aminet 8 (1995)(GTI - Schatztruhe)[!][Oct 1995].iso / Aminet / comm / tcp / Netdial4_0.lha / AmiTCP_Netdial4.0 / netdial.connect < prev    next >
AmigaDOS Script File  |  1980-05-28  |  1KB  |  63 lines
  1. .key HOSTNAME/A,HOSTADDRESS/A,IPADDRESS/A,USERNAME/A,IPTYPE/A
  2. .bra {
  3. .ket }
  4. .def HOSTNAME badhost
  5. .def HOSTADDRESS 0.0.0.0
  6. .def IPADDRESS 0.0.0.0
  7. .def USERNAME noname
  8. .def IPTYPE cslip0
  9.  
  10. ; log in
  11.  
  12. echo
  13. echo login: {USERNAME} : {IPADDRESS} at {HOSTNAME} : {HOSTADDRESS} using {IPTYPE}
  14. echo
  15.  
  16. ; AmiTCP:bin/login -f {USERNAME}
  17. AmiTCP:bin/umask 022
  18.  
  19. AmiTCP:AmiTCP
  20.  
  21. WaitForPort AMITCP
  22.  
  23. ; Configure loop-back device
  24. AmiTCP:bin/ifconfig lo0 localhost
  25.  
  26. ; Assure that ENV:Sana2 exists
  27. if not exists ENV:Sana2
  28.   makedir ENV:Sana2
  29. endif
  30.  
  31. ; Create cslip0 configuration file
  32. ;echo >env:sana2/cslip0.config serial.device 0 19200 {IPADDRESS} MTU=576 7WIRE
  33. echo >env:sana2/slip0.config serial.device 0 19200 {IPADDRESS} MTU=576 7WIRE
  34. echo >env:sana2/ppp0.config serial.device 0 19200 {IPADDRESS} MTU=576 7WIRE
  35. echo >env:sana2/{IPTYPE}.config serial.device 0 19200 {IPADDRESS} MTU=576 7WIRE
  36.  
  37. ; Configure cslip0
  38. AmiTCP:bin/ifconfig {IPTYPE} {IPADDRESS} {HOSTADDRESS}
  39.  
  40. ; Add route to this host
  41. AmiTCP:bin/route add {IPADDRESS} localhost
  42. AmiTCP:bin/route add {HOSTADDRESS} {HOSTNAME}
  43.  
  44. ; Add route to the default gateway
  45. AmiTCP:bin/route add default {HOSTADDRESS}
  46. echo Routing Completed
  47.  
  48. setenv HOSTNAME `AmiTCP:bin/hostname`
  49. echo Hostname Assigned
  50.  
  51. Assign TCP: Exists >NIL:
  52. echo TCP Assigned
  53.  
  54. IF Warn
  55.   echo mounting TCP:
  56.   Mount TCP: from AmiTCP:devs/Inet-Mountlist
  57. EndIf
  58.  
  59. echo Start the internet `super server'
  60. run AmiTCP:bin/inetd >NIL:
  61.  
  62. endcli
  63.